home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic Source Code / Visual Basic Source Code.iso / vbsource / ruthie / ruthie.bas < prev    next >
Encoding:
BASIC Source File  |  1995-05-09  |  2.1 KB  |  42 lines
  1. '   Copyright ⌐ 1991 by John Murdoch. All Rights Reserved.
  2. '   *** Note:
  3. '   *** Maintenance Header
  4. '   Version Date        By      Action
  5. '   1.0     6/21/91     JM      Initial keyin
  6. '   1.0a    6/21/91     JM      Added About Ruthie...
  7. '   1.1a    6/23/91     JM      Added Game2, links to (future) Game3
  8. '   1.1b    6/25/91     JM      Fixed bug in link between Ruthie (Game1)
  9. '                               and Game2. Added picture of Ruthie to Open2,
  10. '                               and included correct address.
  11. '   1.2     6/26/91     JM      Added Game3, shortened timer interval on Ruthie (Game1)
  12. '   1.2a    7/4/91      JM      Made screens automatically adjust to user monitor--
  13. '                               pictures, controls, etc., adjust as well. Added menus
  14. '                               to each game, for continuity (and so you can read the
  15. '                               rules for each game).
  16. '   1.3a    7/8/91      JM      Added special Instructions forms for each game. Fixed minor
  17. '                               control refresh problems, esp. in Games 2 and 3.
  18. '                               Killed off the "multibeep" in Game1 (Ruthie). Also
  19. '                               eliminated Min buttons on Games--the .Resize event procedures
  20. '                               were crashing if a game was minimized. When I can spring for
  21. '                               the $49, I'll buy the MS Help compiler. For now, the app has
  22. '                               to carry the extra baggage of three more forms....
  23. '   1.3b    7/9/91      JM      Added Game menus, so user can switch easily from Game1 to Game3
  24. '                               Also spent time chasing down a bug in Game2.
  25. '                               This will be <pray> the first version UL'd to CompuServe.
  26. '
  27. '   *** Global Variable definitions from CONSTANT.TXT
  28.  
  29. ' Booleans
  30. Global Const TRUE = -1
  31. Global Const FALSE = 0
  32.  
  33.  
  34. ' Show (form)
  35. Global Const MODAL = 1
  36. Global Const MODELESS = 0
  37.  
  38. '   *** Global variables for this application
  39. Global Const HEADER = "RuthieWare"
  40. Global Const HOWLONG = 3500
  41.  
  42.